inherited frmBaseDialogMultiSelect: TfrmBaseDialogMultiSelect
  Left = 204
  Top = 133
  Caption = #22810#20154#30003#35831
  ClientHeight = 423
  ClientWidth = 610
  DesignSize = (
    610
    423)
  PixelsPerInch = 96
  TextHeight = 12
  inherited btnOK: TBitBtn
    Left = 437
    Top = 372
    Width = 74
    ModalResult = 0
    Kind = bkCustom
  end
  inherited btnCancel: TBitBtn
    Left = 519
    Top = 372
    Width = 79
  end
  object gboxN: TGroupBox
    Left = 10
    Top = 70
    Width = 178
    Height = 341
    Caption = #26410#36873#21517#21333
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
  end
  object gboxY: TGroupBox
    Left = 250
    Top = 72
    Width = 171
    Height = 341
    Caption = #24050#36873#21517#21333
    Font.Charset = GB2312_CHARSET
    Font.Color = clBlack
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
  end
  object BitOneToRight: TBitBtn
    Left = 201
    Top = 146
    Width = 40
    Height = 24
    TabOrder = 4
    OnClick = BitOneToRightClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
      DADAADADADADADADADADDADADADADADADADAADADADA0ADADADADDADADAD00ADA
      DADAADADADA060ADADADDAD00000660ADADAADA066666660ADADDAD066666666
      0ADAADA066666660ADADDAD00000660ADADAADADADA060ADADADDADADAD00ADA
      DADAADADADA0ADADADADDADADADADADADADAADADADADADADADAD}
  end
  object BtnOneToLeft: TBitBtn
    Left = 201
    Top = 190
    Width = 40
    Height = 24
    TabOrder = 5
    OnClick = BtnOneToLeftClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
      DADAADADADADADADADADDADADADADADADADAADADADA0ADADADADDADADA00DADA
      DADAADADA060ADADADADDADA06600000DADAADA066666660ADADDA0666666660
      DADAADA066666660ADADDADA06600000DADAADADA060ADADADADDADADA00DADA
      DADAADADADA0ADADADADDADADADADADADADAADADADADADADADAD}
  end
  object BtnALLToLeft: TBitBtn
    Left = 201
    Top = 299
    Width = 40
    Height = 24
    TabOrder = 6
    OnClick = BtnALLToLeftClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
      DADAADADADADADADADADDADADAD0DA0ADADAADADAD00A00DADADDADAD060060A
      DADAADAD06606600000DDAD066066666660AAD0660666666660DDAD066066666
      660AADAD06606600000DDADAD060060ADADAADADAD00A00DADADDADADAD0DA0A
      DADAADADADADADADADADDADADADADADADADAADADADADADADADAD}
  end
  object BtnAllToRight: TBitBtn
    Left = 201
    Top = 254
    Width = 40
    Height = 24
    TabOrder = 7
    OnClick = BtnAllToRightClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      04000000000080000000120B0000120B00001000000010000000000000000000
      8000008000000080800080000000800080008080000080808000C0C0C0000000
      FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
      DADAADADADADADADADADDADADADADADADADAADADA0AD0DADADADDADAD00A00DA
      DADAADADA060060DADADD00000660660DADAA066666660660DADD06666666606
      60DAA066666660660DADD00000660660DADAADADA060060DADADDADAD00A00DA
      DADAADADA0AD0DADADADDADADADADADADADAADADADADADADADAD}
  end
  object GroupBox1: TGroupBox
    Left = 12
    Top = 14
    Width = 407
    Height = 45
    TabOrder = 8
    object Label2: TLabel
      Left = 10
      Top = 18
      Width = 24
      Height = 12
      Caption = #37096#38376
    end
    object Label3: TLabel
      Left = 220
      Top = 18
      Width = 24
      Height = 12
      Caption = #31185#23460
    end
  end
  object qySelectY: TADOQuery
    Connection = frmDataModule.ADOCon
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'UserID'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 20
        Value = Null
      end
      item
        Name = 'FormName'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 200
        Value = Null
      end>
    SQL.Strings = (
      'SELECT * FROM HR_EmpSelect_Y'
      'where UserID=:UserID AND FormName=:FormName')
    Left = 342
    Top = 192
    object qySelectYEmpID: TStringField
      DisplayLabel = #24037#21495
      DisplayWidth = 8
      FieldName = 'EmpID'
      Size = 8
    end
    object qySelectYEmpName: TWideStringField
      DisplayLabel = #22995#21517
      DisplayWidth = 12
      FieldName = 'EmpName'
    end
    object qySelectYUserID: TStringField
      DisplayWidth = 20
      FieldName = 'UserID'
      Visible = False
    end
    object qySelectYFormName: TStringField
      DisplayWidth = 200
      FieldName = 'FormName'
      Visible = False
      Size = 200
    end
  end
  object dsSelectY: TDataSource
    DataSet = qySelectY
    Left = 342
    Top = 244
  end
  object qySelectN: TADOQuery
    Connection = frmDataModule.ADOCon
    CursorType = ctStatic
    Parameters = <
      item
        Name = 'UserID'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 20
        Value = Null
      end
      item
        Name = 'FormName'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 200
        Value = Null
      end>
    SQL.Strings = (
      'SELECT * FROM HR_EmpSelect_N'
      'where UserID=:UserID AND FormName=:FormName')
    Left = 84
    Top = 184
    object qySelectNEmpID: TStringField
      DisplayLabel = #24037#21495
      DisplayWidth = 8
      FieldName = 'EmpID'
      Size = 8
    end
    object qySelectNEmpName: TWideStringField
      DisplayLabel = #22995#21517
      DisplayWidth = 12
      FieldName = 'EmpName'
    end
    object qySelectNUserID: TStringField
      DisplayWidth = 20
      FieldName = 'UserID'
      Visible = False
    end
    object qySelectNFormName: TStringField
      DisplayWidth = 200
      FieldName = 'FormName'
      Visible = False
      Size = 200
    end
  end
  object dsSelectN: TDataSource
    DataSet = qySelectN
    Left = 84
    Top = 232
  end
  object qyDept: TADOQuery
    Connection = frmDataModule.ADOCon
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT  ED_DeptID , ED_DeptNM FROM td_Dept ')
    Left = 664
    Top = 148
    object qyDeptED_DeptID: TStringField
      DisplayLabel = #37096#38376#32534#21495
      DisplayWidth = 6
      FieldName = 'ED_DeptID'
      Size = 6
    end
    object qyDeptED_DeptNM: TWideStringField
      DisplayLabel = #37096#38376#21517#31216
      DisplayWidth = 12
      FieldName = 'ED_DeptNM'
      Size = 12
    end
  end
  object qyGroup: TADOQuery
    Connection = frmDataModule.ADOCon
    CursorType = ctStatic
    DataSource = dsDept
    Parameters = <
      item
        Name = 'ED_DeptID'
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 6
        Value = 'D01'
      end>
    SQL.Strings = (
      'SELECT  EG_GroupID , EG_GroupNM '
      'FROM td_Group '
      'where EG_DeptID=:ED_DeptID')
    Left = 670
    Top = 272
    object qyGroupEG_GroupID: TStringField
      DisplayLabel = #32452#21035#32534#21495
      DisplayWidth = 6
      FieldName = 'EG_GroupID'
      Size = 6
    end
    object qyGroupEG_GroupNM: TWideStringField
      DisplayLabel = #32452#21035#21517#31216
      DisplayWidth = 10
      FieldName = 'EG_GroupNM'
    end
  end
  object dsDept: TDataSource
    DataSet = qyDept
    Left = 664
    Top = 212
  end
  object QueTmp: TADOQuery
    Connection = frmDataModule.ADOCon
    Parameters = <>
    Left = 206
    Top = 86
  end
  object qySelectFromEmp: TADOQuery
    Connection = frmDataModule.ADOCon
    Parameters = <>
    SQL.Strings = (
      
        'DECLARE @UserID VARCHAR(20), @FormName VARCHAR(200),@DeptID VARC' +
        'HAR(6),@GroupID VARCHAR(6)'
      'SET @UserID='#39'ADMIN'#39
      'SET @FormName='#39'fmCK_ReqHolidayMultiNew'#39
      'SET @DeptID='#39'D01'#39
      'SET @GroupID='#39'%'#39
      ''
      
        'DELETE HR_EmpSelect_N WHERE UserID=@UserID AND FormName=@FormNam' +
        'e'
      
        'INSERT INTO HR_EmpSelect_N (UserID , FormName , EmpID , EmpName ' +
        ')'
      'SELECT @UserID,@FormName, EM_EmployeeID , EM_Name '
      'FROM td_EmpMaster '
      
        'WHERE EM_DeptID LIKE @DeptID AND ISNULL(EM_GroupID,'#39#39') LIKE @Gro' +
        'upID AND (EM_DimissionDate IS NULL) AND EM_EmployeeID NOT IN (SE' +
        'LECT EmpID FROM HR_EmpSelect_Y WHERE UserID=@UserID AND FormName' +
        '=@FormName)')
    Left = 660
    Top = 16
  end
end
